﻿Public Class FrmMantenimientoBasicoInsertar

    Private mMantenimientoBE As BE.MantenimientoBasico
    Private mMantenimientoBS As BS.MantenimientoBasico


    Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
        Me.mMantenimientoBS = New BS.MantenimientoBasico

        
        If DatosValidos() Then

            Me.mMantenimientoBE = New BE.MantenimientoBasico()

            mMantenimientoBE.Nombre = txtNombre.Text
            mMantenimientoBE.Descripcion = txtDescripcion.Text

            Try
                mMantenimientoBS.Agregar(mMantenimientoBE)
            Catch ex As Exception
                MessageBox.Show("Problemas al Insertar Los datos")
            End Try

            Me.DialogResult = Windows.Forms.DialogResult.OK
        End If


        
    End Sub

    Function DatosValidos() As Boolean
        Dim primerControl As Control = Nothing
        Dim mensajeDeValidacion As String = String.Empty

        Me.txtNombre.Text = Me.txtNombre.Text.Trim
        Me.txtDescripcion.Text = Me.txtDescripcion.Text.Trim


        If Me.txtNombre.Text = String.Empty Then
            mensajeDeValidacion = "Nombre es requerido"
            primerControl = Me.txtNombre
        End If


        If Me.txtDescripcion.Text = String.Empty Then
            mensajeDeValidacion &= vbCrLf & "Descripción es requerida"

            If primerControl Is Nothing Then
                primerControl = Me.txtDescripcion
            End If

        End If

        If Not primerControl Is Nothing Then
            MessageBox.Show(mensajeDeValidacion, "Validación", MessageBoxButtons.OK)
            primerControl.Focus()
            Return False

        End If

        Return True
    End Function

End Class
